pse
currentpoint
/picTop exch def
/picLeft exch def
psb